MacTech 1 to 12

home *** CD-ROM | disk | FTP | other *** search
/ MacTech 1 to 12 / MacTech-vol-1-12.toast / Source / MacTech® Magazine / Volume 12 - 1996 / 12.04 Apr 96 / ThreadingAppleEvents.sit / ThreadingAppleEvents / Grant's CGI Code 1.0b13 / Util / ListSTAR.c < prev next >
MacBinary | 1995-12-17 | 9.6 KB | [TEXT/CWIE]
open in:
MacOS 8.1 extracted |
Win98 extracted |
DOS extracted
browse contents |
view JSON data |
view as text

This file was processed as: MacBinary (archive/macBinary).
Confidence	Program	Detection	Match Type	Support
`66%`	dexvert	Compact Compressed (Unix) `(archive/compact)`	ext	Supported
`10%`	dexvert	MacBinary `(archive/macBinary)`	fallback	Supported
`1%`	dexvert	Text File `(text/txt)`	fallback	Supported
`100%`	file	MacBinary II, Sun Dec 17 12:36:26 1995, modified Sun Dec 17 12:36:26 1995, creator 'CWIE', type ASCII, 9144 bytes "ListSTAR.c" , at 0x2438 410 bytes resource	default (weak)
`99%`	file	data	default
`74%`	TrID	Macintosh plain text (MacBinary)	default
`25%`	TrID	MacBinary 2	default (weak)
`100%`	lsar	MacBinary	default
id metadata
key	value
macFileType	`[TEXT]`
macFileCreator	`[CWIE]`
hex view
+--------+-------------------------+-------------------------+--------+--------+
|00000000| 00 0a 4c 69 73 74 53 54 | 41 52 2e 63 00 00 00 00 |..ListST|AR.c....|
|00000010| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000020| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000030| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000040| 00 54 45 58 54 43 57 49 | 45 00 00 00 00 00 00 00 |.TEXTCWI|E.......|
|00000050| 00 00 00 00 00 23 b8 00 | 00 01 9a ac fa 05 9a ac |.....#..|........|
|00000060| fa 05 9a 00 00 04 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000070| 00 00 00 00 00 00 00 00 | 00 00 81 81 32 82 00 00 |........|....2...|
|00000080| 2f 2a 2a 2a 2a 2a 0d 20 | 2a 0d 20 2a 09 47 72 61 |/*****. |*. *.Gra|
|00000090| 6e 74 27 73 20 43 47 49 | 20 46 72 61 6d 65 77 6f |nt's CGI| Framewo|
|000000a0| 72 6b 0d 20 2a 09 09 28 | 43 6f 6d 6d 6f 6e 20 47 |rk. *..(|Common G|
|000000b0| 72 61 6e 74 20 49 6e 74 | 65 72 66 61 63 65 20 3a |rant Int|erface :|
|000000c0| 2d 29 0d 20 2a 09 09 62 | 79 20 47 72 61 6e 74 20 |-). *..b|y Grant |
|000000d0| 4e 65 75 66 65 6c 64 0d | 20 2a 09 09 68 74 74 70 |Neufeld.| *..http|
|000000e0| 3a 2f 2f 61 72 70 70 31 | 2e 63 61 72 6c 65 74 6f |://arpp1|.carleto|
|000000f0| 6e 2e 63 61 2f 67 72 61 | 6e 74 2f 6d 61 63 2f 67 |n.ca/gra|nt/mac/g|
|00000100| 72 61 6e 74 73 63 67 69 | 2f 0d 20 2a 0d 20 2a 09 |rantscgi|/. *. *.|
|00000110| 4c 69 73 74 53 54 41 52 | 2e 63 0d 20 2a 0d 20 2a |ListSTAR|.c. *. *|
|00000120| 09 53 74 61 6e 64 61 72 | 64 20 66 75 6e 63 74 69 |.Standar|d functi|
|00000130| 6f 6e 73 20 66 6f 72 20 | 4c 69 73 74 53 54 41 52 |ons for |ListSTAR|
|00000140| 20 74 72 69 67 67 65 72 | 20 26 20 61 63 74 69 6f | trigger| & actio|
|00000150| 6e 20 61 70 70 6c 69 63 | 61 74 69 6f 6e 73 2e 0d |n applic|ations..|
|00000160| 20 2a 0d 20 2a 09 59 6f | 75 20 6d 75 73 74 20 63 | *. *.Yo|u must c|
|00000170| 61 6c 6c 20 49 6e 69 74 | 4c 69 73 74 53 54 41 52 |all Init|ListSTAR|
|00000180| 55 74 69 6c 20 69 6e 20 | 79 6f 75 72 20 61 70 70 |Util in |your app|
|00000190| 6c 69 63 61 74 69 6f 6e | 20 73 74 61 72 74 75 70 |lication| startup|
|000001a0| 2e 0d 20 2a 09 59 6f 75 | 20 6d 75 73 74 20 69 6e |.. *.You| must in|
|000001b0| 73 74 61 6c 6c 20 4c 69 | 73 74 53 54 41 52 41 45 |stall Li|stSTARAE|
|000001c0| 48 61 6e 64 6c 65 20 61 | 73 20 74 68 65 20 65 76 |Handle a|s the ev|
|000001d0| 65 6e 74 20 68 61 6e 64 | 6c 65 72 20 66 6f 72 20 |ent hand|ler for |
|000001e0| 74 68 65 20 39 65 76 74 | 39 4c 69 73 20 61 70 70 |the 9evt|9Lis app|
|000001f0| 6c 65 20 65 76 65 6e 74 | 0d 20 2a 09 59 6f 75 20 |le event|. *.You |
|00000200| 6d 75 73 74 20 77 72 69 | 74 65 20 74 68 65 20 66 |must wri|te the f|
|00000210| 75 6e 63 74 69 6f 6e 3a | 0d 20 2a 09 09 76 6f 69 |unction:|. *..voi|
|00000220| 64 20 4d 79 4c 69 73 74 | 53 54 41 52 50 72 6f 63 |d MyList|STARProc|
|00000230| 65 73 73 20 28 20 4c 53 | 74 61 72 48 64 6c 20 74 |ess ( LS|tarHdl t|
|00000240| 68 65 4c 53 74 61 72 48 | 64 6c 20 29 0d 20 2a 09 |heLStarH|dl ). *.|
|00000250| 09 77 68 69 63 68 20 69 | 73 20 77 68 65 72 65 20 |.which i|s where |
|00000260| 79 6f 75 20 77 69 6c 6c | 2c 20 67 75 65 73 73 20 |you will|, guess |
|00000270| 77 68 61 74 2c 20 64 6f | 20 79 6f 75 72 20 61 70 |what, do| your ap|
|00000280| 70 6c 69 63 61 74 69 6f | 6e 20 73 70 65 63 69 66 |plicatio|n specif|
|00000290| 69 63 20 70 72 6f 63 65 | 73 73 69 6e 67 0d 20 2a |ic proce|ssing. *|
|000002a0| 09 09 6f 66 20 74 68 65 | 20 4c 69 73 74 53 54 41 |..of the| ListSTA|
|000002b0| 52 20 73 74 75 66 66 2e | 0d 20 2a 0d 20 2a 09 44 |R stuff.|. *. *.D|
|000002c0| 6f 20 6e 6f 74 20 63 61 | 6c 6c 20 61 6e 79 20 66 |o not ca|ll any f|
|000002d0| 75 6e 63 74 69 6f 6e 73 | 20 62 65 67 69 6e 69 6e |unctions| beginin|
|000002e0| 67 20 77 69 74 68 20 6c | 6f 77 65 72 20 63 61 73 |g with l|ower cas|
|000002f0| 65 20 27 6c 73 74 61 72 | 27 20 2d 20 79 6f 75 20 |e 'lstar|' - you |
|00000300| 63 61 6e 20 75 73 65 20 | 61 6e 79 20 6f 66 20 74 |can use |any of t|
|00000310| 68 65 0d 20 2a 09 6f 74 | 68 65 72 73 20 2d 20 62 |he. *.ot|hers - b|
|00000320| 75 74 20 72 65 61 64 20 | 74 68 65 69 72 20 63 6f |ut read |their co|
|00000330| 6d 6d 65 6e 74 73 20 66 | 69 72 73 74 20 66 6f 72 |mments f|irst for|
|00000340| 20 64 65 74 61 69 6c 73 | 2e 0d 20 2a 0d 20 2a 09 | details|.. *. *.|
|00000350| 77 61 74 63 68 20 74 68 | 65 20 68 6f 6d 65 70 61 |watch th|e homepa|
|00000360| 67 65 20 66 6f 72 20 66 | 75 74 75 72 65 20 75 70 |ge for f|uture up|
|00000370| 67 72 61 64 65 73 0d 20 | 2a 0d 20 2a 09 6e 6f 74 |grades. |*. *.not|
|00000380| 69 63 65 20 6f 66 20 75 | 70 67 72 61 64 65 73 20 |ice of u|pgrades |
|00000390| 77 69 6c 6c 20 62 65 20 | 70 6f 73 74 65 64 20 74 |will be |posted t|
|000003a0| 6f 20 6d 61 63 77 77 77 | 74 6f 6f 6c 40 61 72 70 |o macwww|tool@arp|
|000003b0| 70 31 2e 63 61 72 65 6c | 74 6f 6e 2e 63 61 0d 20 |p1.carel|ton.ca. |
|000003c0| 2a 09 09 73 65 65 20 68 | 74 74 70 3a 2f 2f 61 72 |*..see h|ttp://ar|
|000003d0| 70 70 31 2e 63 61 72 6c | 65 74 6f 6e 2e 63 61 2f |pp1.carl|eton.ca/|
|000003e0| 6c 69 73 74 2f 6d 61 63 | 77 77 77 74 6f 6f 6c 2e |list/mac|wwwtool.|
|000003f0| 68 74 6d 6c 20 66 6f 72 | 20 64 65 74 61 69 6c 73 |html for| details|
|00000400| 0d 20 2a 0d 20 2a 0d 20 | 2a 09 43 6f 70 79 72 69 |. *. *. |*.Copyri|
|00000410| 67 68 74 20 a9 31 39 39 | 35 20 62 79 20 47 72 61 |ght .199|5 by Gra|
|00000420| 6e 74 20 4e 65 75 66 65 | 6c 64 0d 20 2a 0d 20 2a |nt Neufe|ld. *. *|
|00000430| 09 68 74 74 70 3a 2f 2f | 61 72 70 70 31 2e 63 61 |.http://|arpp1.ca|
|00000440| 72 6c 65 74 6f 6e 2e 63 | 61 2f 67 72 61 6e 74 2f |rleton.c|a/grant/|
|00000450| 0d 20 2a 09 67 6e 65 75 | 66 65 6c 64 40 63 63 73 |. *.gneu|feld@ccs|
|00000460| 2e 63 61 72 6c 65 74 6f | 6e 2e 63 61 0d 20 2a 09 |.carleto|n.ca. *.|
|00000470| 67 72 61 6e 74 40 61 63 | 6d 2e 6f 72 67 0d 20 2a |grant@ac|m.org. *|
|00000480| 0d 20 2a 09 54 68 69 73 | 20 73 6f 75 72 63 65 20 |. *.This| source |
|00000490| 6d 61 79 20 62 65 20 66 | 72 65 65 6c 79 20 75 73 |may be f|reely us|
|000004a0| 65 64 20 61 73 20 6c 6f | 6e 67 20 61 73 20 74 68 |ed as lo|ng as th|
|000004b0| 65 20 63 6f 70 79 72 69 | 67 68 74 20 6e 6f 74 69 |e copyri|ght noti|
|000004c0| 63 65 20 69 73 20 6b 65 | 70 74 20 69 6e 20 74 68 |ce is ke|pt in th|
|000004d0| 65 20 73 6f 75 72 63 65 | 2e 0d 20 2a 09 49 20 61 |e source|.. *.I a|
|000004e0| 73 6b 20 74 68 61 74 20 | 79 6f 75 20 6c 65 74 20 |sk that |you let |
|000004f0| 6d 65 20 6b 6e 6f 77 20 | 6f 66 20 61 6e 79 20 65 |me know |of any e|
|00000500| 6e 68 61 6e 63 65 6d 65 | 6e 74 73 20 28 72 65 61 |nhanceme|nts (rea|
|00000510| 64 3a 20 62 75 67 20 66 | 69 78 65 73 29 20 74 6f |d: bug f|ixes) to|
|00000520| 20 74 68 69 73 20 63 6f | 64 65 2e 0d 20 2a 09 49 | this co|de.. *.I|
|00000530| 20 77 6f 75 6c 64 20 61 | 6c 73 6f 20 6c 69 6b 65 | would a|lso like|
|00000540| 20 63 6f 70 69 65 73 20 | 6f 66 20 28 6f 72 20 64 | copies |of (or d|
|00000550| 69 73 63 6f 75 6e 74 73 | 20 6f 6e 29 20 61 6e 79 |iscounts| on) any|
|00000560| 74 68 69 6e 67 20 79 6f | 75 20 70 72 6f 64 75 63 |thing yo|u produc|
|00000570| 65 20 74 68 69 73 20 77 | 69 74 68 2c 20 70 6c 65 |e this w|ith, ple|
|00000580| 61 73 65 2e 0d 20 2a 0d | 20 2a 09 53 65 65 20 74 |ase.. *.| *.See t|
|00000590| 68 65 20 4c 69 63 65 6e | 73 65 20 61 6e 64 20 4c |he Licen|se and L|
|000005a0| 69 6d 69 74 65 64 20 57 | 61 72 72 61 6e 74 79 20 |imited W|arranty |
|000005b0| 41 67 72 65 65 6d 65 6e | 74 20 66 6f 72 20 61 6c |Agreemen|t for al|
|000005c0| 6c 20 74 68 65 20 6c 65 | 67 61 6c 20 73 74 75 66 |l the le|gal stuf|
|000005d0| 66 2e 0d 20 2a 0d 20 2a | 2a 2a 2a 2a 2f 0d 0d 23 |f.. *. *|****/..#|
|000005e0| 69 6e 63 6c 75 64 65 20 | 22 4d 79 43 6f 6e 66 69 |include |"MyConfi|
|000005f0| 67 75 72 61 74 69 6f 6e | 2e 68 22 0d 23 69 66 20 |guration|.h".#if |
|00000600| 6b 43 6f 6d 70 69 6c 65 | 57 69 74 68 4c 69 73 74 |kCompile|WithList|
|00000610| 53 54 41 52 43 6f 64 65 | 0d 0d 0d 23 69 6e 63 6c |STARCode|...#incl|
|00000620| 75 64 65 20 3c 73 74 72 | 69 6e 67 2e 68 3e 0d 0d |ude <str|ing.h>..|
|00000630| 23 69 6e 63 6c 75 64 65 | 20 22 63 6f 6d 70 69 6c |#include| "compil|
|00000640| 65 72 5f 73 74 75 66 66 | 2e 68 22 0d 23 69 6e 63 |er_stuff|.h".#inc|
|00000650| 6c 75 64 65 20 22 67 6c | 6f 62 61 6c 73 2e 68 22 |lude "gl|obals.h"|
|00000660| 0d 0d 23 69 6e 63 6c 75 | 64 65 20 22 41 45 46 75 |..#inclu|de "AEFu|
|00000670| 6e 63 2e 68 22 0d 23 69 | 6e 63 6c 75 64 65 20 22 |nc.h".#i|nclude "|
|00000680| 44 65 62 75 67 55 74 69 | 6c 2e 68 22 0d 23 69 6e |DebugUti|l.h".#in|
|00000690| 63 6c 75 64 65 20 22 4d | 65 6d 6f 72 79 55 74 69 |clude "M|emoryUti|
|000006a0| 6c 2e 68 22 0d 23 69 6e | 63 6c 75 64 65 20 22 53 |l.h".#in|clude "S|
|000006b0| 74 72 69 6e 67 55 74 69 | 6c 2e 68 22 0d 0d 2f 2a |tringUti|l.h"../*|
|000006c0| 20 4c 69 73 74 53 54 41 | 52 2e 68 20 70 72 6f 63 | ListSTA|R.h proc|
|000006d0| 65 73 73 65 73 20 64 69 | 66 66 65 72 65 6e 74 6c |esses di|fferentl|
|000006e0| 79 20 66 6f 72 20 4c 69 | 73 74 53 54 41 52 2e 63 |y for Li|stSTAR.c|
|000006f0| 2c 0d 09 74 68 69 73 20 | 69 73 20 63 6f 6e 74 72 |,..this |is contr|
|00000700| 6f 6c 6c 65 64 20 62 79 | 20 64 65 66 69 6e 69 6e |olled by| definin|
|00000710| 67 20 5f 5f 4c 53 74 61 | 72 53 65 67 6d 65 6e 74 |g __LSta|rSegment|
|00000720| 5f 5f 20 2a 2f 0d 23 64 | 65 66 69 6e 65 20 5f 5f |__ */.#d|efine __|
|00000730| 4c 53 74 61 72 53 65 67 | 6d 65 6e 74 5f 5f 09 31 |LStarSeg|ment__.1|
|00000740| 0d 23 69 6e 63 6c 75 64 | 65 20 22 4c 69 73 74 53 |.#includ|e "ListS|
|00000750| 54 41 52 2e 68 22 0d 23 | 75 6e 64 65 66 09 5f 5f |TAR.h".#|undef.__|
|00000760| 4c 53 74 61 72 53 65 67 | 6d 65 6e 74 5f 5f 0d 0d |LStarSeg|ment__..|
|00000770| 0d 2f 2a 2a 2a 20 20 43 | 4f 4e 53 54 41 4e 54 20 |./***  C|ONSTANT |
|00000780| 44 45 43 4c 41 52 41 54 | 49 4f 4e 53 20 20 2a 2a |DECLARAT|IONS  **|
|00000790| 2a 2f 0d 0d 2f 2a 2a 2a | 20 20 4c 4f 43 41 4c 20 |*/../***|  LOCAL |
|000007a0| 46 55 4e 43 54 49 4f 4e | 20 50 52 4f 54 4f 54 59 |FUNCTION| PROTOTY|
|000007b0| 50 45 53 20 20 2a 2a 2a | 2f 0d 0d 73 74 61 74 69 |PES  ***|/..stati|
|000007c0| 63 09 76 6f 69 64 09 6c | 73 74 61 72 44 69 73 70 |c.void.l|starDisp|
|000007d0| 6f 73 65 48 61 6e 64 6c | 65 09 09 09 28 20 4c 53 |oseHandl|e...( LS|
|000007e0| 74 61 72 48 64 6c 20 29 | 3b 0d 0d 73 74 61 74 69 |tarHdl )|;..stati|
|000007f0| 63 09 4f 53 45 72 72 09 | 6c 73 74 61 72 41 45 47 |c.OSErr.|lstarAEG|
|00000800| 65 74 50 61 72 61 6d 53 | 70 6f 6f 6c 46 69 6c 65 |etParamS|poolFile|
|00000810| 09 28 20 41 70 70 6c 65 | 45 76 65 6e 74 20 2a 2c |.( Apple|Event *,|
|00000820| 20 41 45 4b 65 79 77 6f | 72 64 2c 20 46 53 53 70 | AEKeywo|rd, FSSp|
|00000830| 65 63 20 2a 2c 20 63 68 | 61 72 20 2a 2c 20 6c 6f |ec *, ch|ar *, lo|
|00000840| 6e 67 20 29 3b 0d 0d 0d | 2f 2a 2a 2a 20 20 46 55 |ng );...|/***  FU|
|00000850| 4e 43 54 49 4f 4e 53 20 | 20 2a 2a 2a 2f 0d 0d 2f |NCTIONS | ***/../|
|00000860| 2a 20 54 68 69 73 20 69 | 6e 69 74 69 61 6c 69 7a |* This i|nitializ|
|00000870| 61 74 69 6f 6e 20 66 75 | 6e 63 74 69 6f 6e 20 4d |ation fu|nction M|
|00000880| 55 53 54 20 62 65 20 63 | 61 6c 6c 65 64 20 69 6e |UST be c|alled in|
|00000890| 20 74 68 65 20 73 74 61 | 72 74 75 70 20 73 65 71 | the sta|rtup seq|
|000008a0| 75 65 6e 63 65 20 6f 66 | 0d 09 79 6f 75 72 20 61 |uence of|..your a|
|000008b0| 70 70 6c 69 63 61 74 69 | 6f 6e 20 2a 2f 0d 4f 53 |pplicati|on */.OS|
|000008c0| 45 72 72 0d 49 6e 69 74 | 4c 69 73 74 53 54 41 52 |Err.Init|ListSTAR|
|000008d0| 55 74 69 6c 20 28 20 76 | 6f 69 64 20 29 0d 7b 0d |Util ( v|oid ).{.|
|000008e0| 09 4f 53 45 72 72 09 09 | 09 09 74 68 65 45 72 72 |.OSErr..|..theErr|
|000008f0| 3b 0d 09 41 45 45 76 65 | 6e 74 48 61 6e 64 6c 65 |;..AEEve|ntHandle|
|00000900| 72 55 50 50 09 74 68 65 | 55 50 50 3b 0d 09 53 74 |rUPP.the|UPP;..St|
|00000910| 72 69 6e 67 48 61 6e 64 | 6c 65 09 09 6c 69 73 74 |ringHand|le..list|
|00000920| 73 74 61 72 53 70 6f 6f | 6c 50 61 74 68 3b 0d 09 |starSpoo|lPath;..|
|00000930| 0d 09 2f 2a 20 69 6e 73 | 74 61 6c 6c 20 74 68 65 |../* ins|tall the|
|00000940| 20 4c 69 73 74 53 54 41 | 52 20 61 70 70 6c 65 20 | ListSTA|R apple |
|00000950| 65 76 65 6e 74 20 68 61 | 6e 64 6c 65 72 20 2a 2f |event ha|ndler */|
|00000960| 0d 09 74 68 65 55 50 50 | 09 3d 20 4e 65 77 41 45 |..theUPP|.= NewAE|
|00000970| 45 76 65 6e 74 48 61 6e | 64 6c 65 72 50 72 6f 63 |EventHan|dlerProc|
|00000980| 20 28 20 4c 69 73 74 53 | 54 41 52 41 70 70 6c 65 | ( ListS|TARApple|
|00000990| 45 76 65 6e 74 20 29 3b | 0d 09 74 68 65 45 72 72 |Event );|..theErr|
|000009a0| 09 3d 20 41 45 49 6e 73 | 74 61 6c 6c 45 76 65 6e |.= AEIns|tallEven|
|000009b0| 74 48 61 6e 64 6c 65 72 | 20 28 20 6b 41 45 43 6c |tHandler| ( kAECl|
|000009c0| 61 73 73 53 74 61 72 4e | 69 6e 65 2c 20 6b 41 45 |assStarN|ine, kAE|
|000009d0| 49 44 4c 69 73 74 53 74 | 61 72 45 76 65 6e 74 2c |IDListSt|arEvent,|
|000009e0| 20 74 68 65 55 50 50 2c | 20 30 4c 2c 20 66 61 6c | theUPP,| 0L, fal|
|000009f0| 73 65 20 29 3b 0d 09 0d | 09 69 66 20 28 20 74 68 |se );...|.if ( th|
|00000a00| 65 45 72 72 20 21 3d 20 | 6e 6f 45 72 72 20 29 0d |eErr != |noErr ).|
|00000a10| 09 7b 0d 09 09 2f 2a 20 | 6c 69 73 74 73 74 61 72 |.{.../* |liststar|
|00000a20| 20 41 45 20 69 6e 73 74 | 61 6c 6c 20 66 61 69 6c | AE inst|all fail|
|00000a30| 65 64 20 2a 2f 0d 09 09 | 72 65 74 75 72 6e 20 74 |ed */...|return t|
|00000a40| 68 65 45 72 72 3b 0d 09 | 7d 0d 09 0d 09 6c 69 73 |heErr;..|}....lis|
|00000a50| 74 73 74 61 72 53 70 6f | 6f 6c 50 61 74 68 20 3d |tstarSpo|olPath =|
|00000a60| 20 47 65 74 53 74 72 69 | 6e 67 20 28 20 6b 72 73 | GetStri|ng ( krs|
|00000a70| 4c 69 73 74 53 54 41 52 | 53 70 6f 6f 6c 50 61 74 |ListSTAR|SpoolPat|
|00000a80| 68 20 29 3b 0d 09 0d 09 | 69 66 20 28 20 6c 69 73 |h );....|if ( lis|
|00000a90| 74 73 74 61 72 53 70 6f | 6f 6c 50 61 74 68 20 21 |tstarSpo|olPath !|
|00000aa0| 3d 20 6e 69 6c 20 29 0d | 09 7b 0d 09 09 48 4c 6f |= nil ).|.{...HLo|
|00000ab0| 63 6b 20 28 20 28 48 61 | 6e 64 6c 65 29 6c 69 73 |ck ( (Ha|ndle)lis|
|00000ac0| 74 73 74 61 72 53 70 6f | 6f 6c 50 61 74 68 20 29 |tstarSpo|olPath )|
|00000ad0| 3b 0d 09 09 0d 09 09 2f | 2a 20 6c 6f 63 61 74 65 |;....../|* locate|
|00000ae0| 20 4c 69 73 74 53 54 41 | 52 27 73 20 6d 61 69 6c | ListSTA|R's mail|
|00000af0| 20 73 70 6f 6f 6c 20 66 | 6f 6c 64 65 72 20 61 6e | spool f|older an|
|00000b00| 64 20 73 65 74 20 75 70 | 20 69 74 27 73 20 46 53 |d set up| it's FS|
|00000b10| 53 70 65 63 2e 0d 09 09 | 09 4f 53 45 72 72 20 72 |Spec....|.OSErr r|
|00000b20| 65 74 75 72 6e 65 64 20 | 69 67 6e 6f 72 65 64 20 |eturned |ignored |
|00000b30| 2a 2f 0d 09 09 74 68 65 | 45 72 72 20 3d 20 46 53 |*/...the|Err = FS|
|00000b40| 4d 61 6b 65 46 53 53 70 | 65 63 20 28 20 6e 69 6c |MakeFSSp|ec ( nil|
|00000b50| 2c 20 6e 69 6c 2c 20 2a | 6c 69 73 74 73 74 61 72 |, nil, *|liststar|
|00000b60| 53 70 6f 6f 6c 50 61 74 | 68 2c 20 26 67 4c 69 73 |SpoolPat|h, &gLis|
|00000b70| 74 53 54 41 52 53 70 6f | 6f 6c 46 6f 6c 64 65 72 |tSTARSpo|olFolder|
|00000b80| 20 29 3b 0d 09 09 0d 09 | 09 48 55 6e 6c 6f 63 6b | );.....|.HUnlock|
|00000b90| 20 28 20 28 48 61 6e 64 | 6c 65 29 6c 69 73 74 73 | ( (Hand|le)lists|
|00000ba0| 74 61 72 53 70 6f 6f 6c | 50 61 74 68 20 29 3b 0d |tarSpool|Path );.|
|00000bb0| 09 09 0d 09 09 52 65 6c | 65 61 73 65 52 65 73 6f |.....Rel|easeReso|
|00000bc0| 75 72 63 65 20 28 20 28 | 48 61 6e 64 6c 65 29 6c |urce ( (|Handle)l|
|00000bd0| 69 73 74 73 74 61 72 53 | 70 6f 6f 6c 50 61 74 68 |iststarS|poolPath|
|00000be0| 20 29 3b 0d 09 7d 0d 09 | 0d 09 72 65 74 75 72 6e | );..}..|..return|
|00000bf0| 20 74 68 65 45 72 72 3b | 0d 7d 20 2f 2a 20 49 6e | theErr;|.} /* In|
|00000c00| 69 74 4c 69 73 74 53 54 | 41 52 55 74 69 6c 20 2a |itListST|ARUtil *|
|00000c10| 2f 0d 0d 0d 23 70 72 61 | 67 6d 61 20 6d 61 72 6b |/...#pra|gma mark|
|00000c20| 20 2d 0d 0d 2f 2a 20 20 | 2a 2f 0d 73 74 61 74 69 | -../*  |*/.stati|
|00000c30| 63 20 76 6f 69 64 0d 6c | 73 74 61 72 44 69 73 70 |c void.l|starDisp|
|00000c40| 6f 73 65 48 61 6e 64 6c | 65 20 28 20 4c 53 74 61 |oseHandl|e ( LSta|
|00000c50| 72 48 64 6c 20 74 68 65 | 4c 53 74 61 72 48 64 6c |rHdl the|LStarHdl|
|00000c60| 20 29 0d 7b 0d 09 6d 79 | 5f 61 73 73 65 72 74 20 | ).{..my|_assert |
|00000c70| 28 20 74 68 65 4c 53 74 | 61 72 48 64 6c 20 21 3d |( theLSt|arHdl !=|
|00000c80| 20 6e 69 6c 2c 20 22 5c | 70 6c 73 74 61 72 44 69 | nil, "\|plstarDi|
|00000c90| 73 70 6f 73 65 48 61 6e | 64 6c 65 3a 20 74 68 65 |sposeHan|dle: the|
|00000ca0| 4c 53 74 61 72 48 64 6c | 20 69 73 20 6e 69 6c 22 |LStarHdl| is nil"|
|00000cb0| 20 29 3b 0d 09 0d 09 69 | 66 20 28 20 28 2a 74 68 | );....i|f ( (*th|
|00000cc0| 65 4c 53 74 61 72 48 64 | 6c 29 2d 3e 6d 61 69 6c |eLStarHd|l)->mail|
|00000cd0| 53 65 72 76 69 63 65 20 | 21 3d 20 6e 69 6c 20 29 |Service |!= nil )|
|00000ce0| 0d 09 7b 0d 09 09 44 69 | 73 70 6f 73 65 50 74 72 |..{...Di|sposePtr|
|00000cf0| 20 28 20 28 50 74 72 29 | 28 28 2a 74 68 65 4c 53 | ( (Ptr)|((*theLS|
|00000d00| 74 61 72 48 64 6c 29 2d | 3e 6d 61 69 6c 53 65 72 |tarHdl)-|>mailSer|
|00000d10| 76 69 63 65 29 20 29 3b | 0d 09 7d 0d 09 69 66 20 |vice) );|..}..if |
|00000d20| 28 20 28 2a 74 68 65 4c | 53 74 61 72 48 64 6c 29 |( (*theL|StarHdl)|
|00000d30| 2d 3e 73 65 6e 64 65 72 | 4e 61 6d 65 20 21 3d 20 |->sender|Name != |
|00000d40| 6e 69 6c 20 29 0d 09 7b | 0d 09 09 44 69 73 70 6f |nil )..{|...Dispo|
|00000d50| 73 65 50 74 72 20 28 20 | 28 50 74 72 29 28 28 2a |sePtr ( |(Ptr)((*|
|00000d60| 74 68 65 4c 53 74 61 72 | 48 64 6c 29 2d 3e 73 65 |theLStar|Hdl)->se|
|00000d70| 6e 64 65 72 4e 61 6d 65 | 29 20 29 3b 0d 09 7d 0d |nderName|) );..}.|
|00000d80| 09 69 66 20 28 20 28 2a | 74 68 65 4c 53 74 61 72 |.if ( (*|theLStar|
|00000d90| 48 64 6c 29 2d 3e 73 65 | 6e 64 65 72 45 6d 61 69 |Hdl)->se|nderEmai|
|00000da0| 6c 20 21 3d 20 6e 69 6c | 20 29 0d 09 7b 0d 09 09 |l != nil| )..{...|
|00000db0| 44 69 73 70 6f 73 65 50 | 74 72 20 28 20 28 50 74 |DisposeP|tr ( (Pt|
|00000dc0| 72 29 28 28 2a 74 68 65 | 4c 53 74 61 72 48 64 6c |r)((*the|LStarHdl|
|00000dd0| 29 2d 3e 73 65 6e 64 65 | 72 45 6d 61 69 6c 29 20 |)->sende|rEmail) |
|00000de0| 29 3b 0d 09 7d 0d 09 69 | 66 20 28 20 28 2a 74 68 |);..}..i|f ( (*th|
|00000df0| 65 4c 53 74 61 72 48 64 | 6c 29 2d 3e 6d 61 69 6c |eLStarHd|l)->mail|
|00000e00| 53 75 62 6a 65 63 74 20 | 21 3d 20 6e 69 6c 20 29 |Subject |!= nil )|
|00000e10| 0d 09 7b 0d 09 09 44 69 | 73 70 6f 73 65 50 74 72 |..{...Di|sposePtr|
|00000e20| 20 28 20 28 50 74 72 29 | 28 28 2a 74 68 65 4c 53 | ( (Ptr)|((*theLS|
|00000e30| 74 61 72 48 64 6c 29 2d | 3e 6d 61 69 6c 53 75 62 |tarHdl)-|>mailSub|
|00000e40| 6a 65 63 74 29 20 29 3b | 0d 09 7d 0d 09 69 66 20 |ject) );|..}..if |
|00000e50| 28 20 28 2a 74 68 65 4c | 53 74 61 72 48 64 6c 29 |( (*theL|StarHdl)|
|00000e60| 2d 3e 72 65 67 45 78 70 | 20 21 3d 20 6e 69 6c 20 |->regExp| != nil |
|00000e70| 29 0d 09 7b 0d 09 09 44 | 69 73 70 6f 73 65 50 74 |)..{...D|isposePt|
|00000e80| 72 20 28 20 28 50 74 72 | 29 28 28 2a 74 68 65 4c |r ( (Ptr|)((*theL|
|00000e90| 53 74 61 72 48 64 6c 29 | 2d 3e 72 65 67 45 78 70 |StarHdl)|->regExp|
|00000ea0| 29 20 29 3b 0d 09 7d 0d | 09 69 66 20 28 20 28 2a |) );..}.|.if ( (*|
|00000eb0| 74 68 65 4c 53 74 61 72 | 48 64 6c 29 2d 3e 73 65 |theLStar|Hdl)->se|
|00000ec0| 6e 64 65 72 4d 43 20 21 | 3d 20 6e 69 6c 20 29 0d |nderMC !|= nil ).|
|00000ed0| 09 7b 0d 09 09 44 69 73 | 70 6f 73 65 50 74 72 20 |.{...Dis|posePtr |
|00000ee0| 28 20 28 50 74 72 29 28 | 28 2a 74 68 65 4c 53 74 |( (Ptr)(|(*theLSt|
|00000ef0| 61 72 48 64 6c 29 2d 3e | 73 65 6e 64 65 72 4d 43 |arHdl)->|senderMC|
|00000f00| 29 20 29 3b 0d 09 7d 0d | 09 69 66 20 28 20 28 2a |) );..}.|.if ( (*|
|00000f10| 74 68 65 4c 53 74 61 72 | 48 64 6c 29 2d 3e 73 65 |theLStar|Hdl)->se|
|00000f20| 6e 64 65 72 4d 43 5a 6f | 6e 65 20 21 3d 20 6e 69 |nderMCZo|ne != ni|
|00000f30| 6c 20 29 0d 09 7b 0d 09 | 09 44 69 73 70 6f 73 65 |l )..{..|.Dispose|
|00000f40| 50 74 72 20 28 20 28 50 | 74 72 29 28 28 2a 74 68 |Ptr ( (P|tr)((*th|
|00000f50| 65 4c 53 74 61 72 48 64 | 6c 29 2d 3e 73 65 6e 64 |eLStarHd|l)->send|
|00000f60| 65 72 4d 43 5a 6f 6e 65 | 29 20 29 3b 0d 09 7d 0d |erMCZone|) );..}.|
|00000f70| 09 69 66 20 28 20 28 2a | 74 68 65 4c 53 74 61 72 |.if ( (*|theLStar|
|00000f80| 48 64 6c 29 2d 3e 73 65 | 6e 64 65 72 4d 43 45 6d |Hdl)->se|nderMCEm|
|00000f90| 61 69 6c 20 21 3d 20 6e | 69 6c 20 29 0d 09 7b 0d |ail != n|il )..{.|
|00000fa0| 09 09 44 69 73 70 6f 73 | 65 50 74 72 20 28 20 28 |..Dispos|ePtr ( (|
|00000fb0| 50 74 72 29 28 28 2a 74 | 68 65 4c 53 74 61 72 48 |Ptr)((*t|heLStarH|
|00000fc0| 64 6c 29 2d 3e 73 65 6e | 64 65 72 4d 43 45 6d 61 |dl)->sen|derMCEma|
|00000fd0| 69 6c 29 20 29 3b 0d 09 | 7d 0d 09 0d 09 44 69 73 |il) );..|}....Dis|
|00000fe0| 70 6f 73 65 48 61 6e 64 | 6c 65 20 28 20 28 48 61 |poseHand|le ( (Ha|
|00000ff0| 6e 64 6c 65 29 74 68 65 | 4c 53 74 61 72 48 64 6c |ndle)the|LStarHdl|
|00001000| 20 29 3b 0d 7d 20 2f 2a | 20 6c 73 74 61 72 44 69 | );.} /*| lstarDi|
|00001010| 73 70 6f 73 65 48 61 6e | 64 6c 65 20 2a 2f 0d 0d |sposeHan|dle */..|
|00001020| 0d 2f 2a 2a 20 20 41 50 | 50 4c 45 20 45 56 45 4e |./**  AP|PLE EVEN|
|00001030| 54 20 53 55 50 50 4f 52 | 54 20 20 2a 2a 2f 0d 23 |T SUPPOR|T  **/.#|
|00001040| 70 72 61 67 6d 61 20 6d | 61 72 6b 20 2d 0d 0d 23 |pragma m|ark -..#|
|00001050| 70 72 61 67 6d 61 20 73 | 65 67 6d 65 6e 74 20 41 |pragma s|egment A|
|00001060| 70 70 6c 65 45 76 65 6e | 74 73 0d 2f 2a 20 41 70 |ppleEven|ts./* Ap|
|00001070| 70 6c 65 45 76 65 6e 74 | 20 48 61 6e 64 6c 65 72 |pleEvent| Handler|
|00001080| 20 66 6f 72 20 74 68 65 | 20 4c 69 73 74 53 54 41 | for the| ListSTA|
|00001090| 52 20 39 65 76 74 2d 39 | 4c 69 73 20 65 76 65 6e |R 9evt-9|Lis even|
|000010a0| 74 20 2a 2f 0d 70 61 73 | 63 61 6c 20 4f 53 45 72 |t */.pas|cal OSEr|
|000010b0| 72 0d 4c 69 73 74 53 54 | 41 52 41 70 70 6c 65 45 |r.ListST|ARAppleE|
|000010c0| 76 65 6e 74 20 28 20 41 | 70 70 6c 65 45 76 65 6e |vent ( A|ppleEven|
|000010d0| 74 20 2a 74 68 65 41 70 | 70 6c 65 45 76 65 6e 74 |t *theAp|pleEvent|
|000010e0| 2c 20 41 70 70 6c 65 45 | 76 65 6e 74 20 2a 54 68 |, AppleE|vent *Th|
|000010f0| 65 52 65 70 6c 79 2c 20 | 6c 6f 6e 67 20 52 65 66 |eReply, |long Ref|
|00001100| 65 72 65 6e 63 65 20 29 | 0d 7b 0d 09 4f 53 45 72 |erence )|.{..OSEr|
|00001110| 72 09 09 74 68 65 45 72 | 72 3b 0d 2f 2f 09 44 65 |r..theEr|r;.//.De|
|00001120| 73 63 54 79 70 65 09 61 | 63 74 75 61 6c 54 79 70 |scType.a|ctualTyp|
|00001130| 65 3b 0d 09 50 74 72 09 | 09 09 74 65 6d 70 42 75 |e;..Ptr.|..tempBu|
|00001140| 66 66 65 72 3b 0d 09 4c | 53 74 61 72 48 64 6c 09 |ffer;..L|StarHdl.|
|00001150| 74 68 65 4c 53 74 61 72 | 48 64 6c 3b 0d 09 0d 09 |theLStar|Hdl;....|
|00001160| 74 68 65 4c 53 74 61 72 | 48 64 6c 20 3d 20 28 4c |theLStar|Hdl = (L|
|00001170| 53 74 61 72 48 64 6c 29 | 20 4d 79 4e 65 77 48 61 |StarHdl)| MyNewHa|
|00001180| 6e 64 6c 65 43 6c 65 61 | 72 20 28 20 73 69 7a 65 |ndleClea|r ( size|
|00001190| 6f 66 28 4c 53 74 61 72 | 52 65 63 6f 72 64 29 2c |of(LStar|Record),|
|000011a0| 20 26 74 68 65 45 72 72 | 20 29 3b 0d 09 0d 09 69 | &theErr| );....i|
|000011b0| 66 20 28 20 74 68 65 4c | 53 74 61 72 48 64 6c 20 |f ( theL|StarHdl |
|000011c0| 3d 3d 20 6e 69 6c 20 29 | 0d 09 7b 0d 09 09 72 65 |== nil )|..{...re|
|000011d0| 74 75 72 6e 20 74 68 65 | 45 72 72 3b 0d 09 7d 0d |turn the|Err;..}.|
|000011e0| 09 0d 09 2f 2a 20 73 74 | 6f 72 65 20 72 65 66 65 |.../* st|ore refe|
|000011f0| 72 65 6e 63 65 73 20 74 | 6f 20 74 68 65 20 61 70 |rences t|o the ap|
|00001200| 70 6c 65 20 65 76 65 6e | 74 20 61 6e 64 20 72 65 |ple even|t and re|
|00001210| 70 6c 79 20 72 65 63 6f | 72 64 73 20 2a 2f 0d 09 |ply reco|rds */..|
|00001220| 28 2a 74 68 65 4c 53 74 | 61 72 48 64 6c 29 2d 3e |(*theLSt|arHdl)->|
|00001230| 61 70 70 6c 65 45 76 65 | 6e 74 09 3d 20 74 68 65 |appleEve|nt.= the|
|00001240| 41 70 70 6c 65 45 76 65 | 6e 74 3b 0d 09 28 2a 74 |AppleEve|nt;..(*t|
|00001250| 68 65 4c 53 74 61 72 48 | 64 6c 29 2d 3e 72 65 70 |heLStarH|dl)->rep|
|00001260| 6c 79 45 76 65 6e 74 09 | 3d 20 54 68 65 52 65 70 |lyEvent.|= TheRep|
|00001270| 6c 79 3b 0d 09 0d 09 74 | 65 6d 70 42 75 66 66 65 |ly;....t|empBuffe|
|00001280| 72 20 3d 20 4d 79 4e 65 | 77 50 74 72 20 28 20 6b |r = MyNe|wPtr ( k|
|00001290| 4c 53 74 61 72 50 61 72 | 61 6d 4d 61 78 53 69 7a |LStarPar|amMaxSiz|
|000012a0| 65 2c 20 26 74 68 65 45 | 72 72 20 29 3b 0d 09 0d |e, &theE|rr );...|
|000012b0| 09 69 66 20 28 20 74 65 | 6d 70 42 75 66 66 65 72 |.if ( te|mpBuffer|
|000012c0| 20 3d 3d 20 6e 69 6c 20 | 29 0d 09 7b 0d 09 09 44 | == nil |)..{...D|
|000012d0| 69 73 70 6f 73 65 48 61 | 6e 64 6c 65 20 28 20 28 |isposeHa|ndle ( (|
|000012e0| 48 61 6e 64 6c 65 29 74 | 68 65 4c 53 74 61 72 48 |Handle)t|heLStarH|
|000012f0| 64 6c 20 29 3b 0d 09 09 | 0d 09 09 72 65 74 75 72 |dl );...|...retur|
|00001300| 6e 20 74 68 65 45 72 72 | 3b 0d 09 7d 0d 09 0d 2f |n theErr|;..}.../|
|00001310| 2f 09 61 63 74 75 61 6c | 54 79 70 65 20 3d 20 28 |/.actual|Type = (|
|00001320| 44 65 73 63 54 79 70 65 | 29 20 27 63 68 61 72 27 |DescType|) 'char'|
|00001330| 3b 0d 09 0d 09 48 4c 6f | 63 6b 48 69 20 28 20 28 |;....HLo|ckHi ( (|
|00001340| 48 61 6e 64 6c 65 29 74 | 68 65 4c 53 74 61 72 48 |Handle)t|heLStarH|
|00001350| 64 6c 20 29 3b 0d 09 0d | 09 2f 2a 20 27 2d 2d 2d |dl );...|./* '---|
|00001360| 2d 27 20 2d 20 64 69 72 | 65 63 74 20 70 61 72 61 |-' - dir|ect para|
|00001370| 6d 65 74 65 72 3a 20 6d | 61 69 6c 53 65 72 76 69 |meter: m|ailServi|
|00001380| 63 65 20 2a 2f 0d 09 74 | 68 65 45 72 72 20 3d 20 |ce */..t|heErr = |
|00001390| 41 45 47 65 74 50 61 72 | 61 6d 53 74 72 69 6e 67 |AEGetPar|amString|
|000013a0| 20 28 20 74 68 65 41 70 | 70 6c 65 45 76 65 6e 74 | ( theAp|pleEvent|
|000013b0| 2c 20 6b 4c 53 54 41 52 | 6d 61 69 6c 53 65 72 76 |, kLSTAR|mailServ|
|000013c0| 69 63 65 2c 20 26 28 28 | 2a 74 68 65 4c 53 74 61 |ice, &((|*theLSta|
|000013d0| 72 48 64 6c 29 2d 3e 6d | 61 69 6c 53 65 72 76 69 |rHdl)->m|ailServi|
|000013e0| 63 65 29 2c 0d 09 09 28 | 63 68 61 72 20 2a 29 74 |ce),...(|char *)t|
|000013f0| 65 6d 70 42 75 66 66 65 | 72 2c 20 6b 4c 53 74 61 |empBuffe|r, kLSta|
|00001400| 72 50 61 72 61 6d 4d 61 | 78 53 69 7a 65 20 29 3b |rParamMa|xSize );|
|00001410| 0d 09 0d 09 2f 2a 20 27 | 73 39 6e 6d 27 20 2d 20 |..../* '|s9nm' - |
|00001420| 73 65 6e 64 65 72 4e 61 | 6d 65 20 2a 2f 0d 09 74 |senderNa|me */..t|
|00001430| 68 65 45 72 72 20 3d 20 | 41 45 47 65 74 50 61 72 |heErr = |AEGetPar|
|00001440| 61 6d 53 74 72 69 6e 67 | 20 28 20 74 68 65 41 70 |amString| ( theAp|
|00001450| 70 6c 65 45 76 65 6e 74 | 2c 20 6b 4c 53 54 41 52 |pleEvent|, kLSTAR|
|00001460| 73 65 6e 64 65 72 4e 61 | 6d 65 2c 20 26 28 28 2a |senderNa|me, &((*|
|00001470| 74 68 65 4c 53 74 61 72 | 48 64 6c 29 2d 3e 73 65 |theLStar|Hdl)->se|
|00001480| 6e 64 65 72 4e 61 6d 65 | 29 2c 0d 09 09 28 63 68 |nderName|),...(ch|
|00001490| 61 72 20 2a 29 74 65 6d | 70 42 75 66 66 65 72 2c |ar *)tem|pBuffer,|
|000014a0| 20 6b 4c 53 74 61 72 50 | 61 72 61 6d 4d 61 78 53 | kLStarP|aramMaxS|
|000014b0| 69 7a 65 20 29 3b 0d 09 | 0d 09 2f 2a 20 27 73 39 |ize );..|../* 's9|
|000014c0| 65 6d 27 20 2d 20 73 65 | 6e 64 65 72 45 6d 61 69 |em' - se|nderEmai|
|000014d0| 6c 20 2a 2f 0d 09 74 68 | 65 45 72 72 20 3d 20 41 |l */..th|eErr = A|
|000014e0| 45 47 65 74 50 61 72 61 | 6d 53 74 72 69 6e 67 20 |EGetPara|mString |
|000014f0| 28 20 74 68 65 41 70 70 | 6c 65 45 76 65 6e 74 2c |( theApp|leEvent,|
|00001500| 20 6b 4c 53 54 41 52 73 | 65 6e 64 65 72 45 6d 61 | kLSTARs|enderEma|
|00001510| 69 6c 2c 20 26 28 28 2a | 74 68 65 4c 53 74 61 72 |il, &((*|theLStar|
|00001520| 48 64 6c 29 2d 3e 73 65 | 6e 64 65 72 45 6d 61 69 |Hdl)->se|nderEmai|
|00001530| 6c 29 2c 0d 09 09 28 63 | 68 61 72 20 2a 29 74 65 |l),...(c|har *)te|
|00001540| 6d 70 42 75 66 66 65 72 | 2c 20 6b 4c 53 74 61 72 |mpBuffer|, kLStar|
|00001550| 50 61 72 61 6d 4d 61 78 | 53 69 7a 65 20 29 3b 0d |ParamMax|Size );.|
|00001560| 09 0d 09 2f 2a 20 27 73 | 39 73 6a 27 20 2d 20 6d |.../* 's|9sj' - m|
|00001570| 61 69 6c 53 75 62 6a 65 | 63 74 20 2a 2f 0d 09 74 |ailSubje|ct */..t|
|00001580| 68 65 45 72 72 20 3d 20 | 41 45 47 65 74 50 61 72 |heErr = |AEGetPar|
|00001590| 61 6d 53 74 72 69 6e 67 | 20 28 20 74 68 65 41 70 |amString| ( theAp|
|000015a0| 70 6c 65 45 76 65 6e 74 | 2c 20 6b 4c 53 54 41 52 |pleEvent|, kLSTAR|
|000015b0| 6d 61 69 6c 53 75 62 6a | 65 63 74 2c 20 26 28 28 |mailSubj|ect, &((|
|000015c0| 2a 74 68 65 4c 53 74 61 | 72 48 64 6c 29 2d 3e 6d |*theLSta|rHdl)->m|
|000015d0| 61 69 6c 53 75 62 6a 65 | 63 74 29 2c 0d 09 09 28 |ailSubje|ct),...(|
|000015e0| 63 68 61 72 20 2a 29 74 | 65 6d 70 42 75 66 66 65 |char *)t|empBuffe|
|000015f0| 72 2c 20 6b 4c 53 74 61 | 72 50 61 72 61 6d 4d 61 |r, kLSta|rParamMa|
|00001600| 78 53 69 7a 65 20 29 3b | 0d 09 0d 09 2f 2a 20 27 |xSize );|..../* '|
|00001610| 73 39 72 65 27 20 2d 20 | 72 65 67 45 78 70 20 2a |s9re' - |regExp *|
|00001620| 2f 0d 09 74 68 65 45 72 | 72 20 3d 20 41 45 47 65 |/..theEr|r = AEGe|
|00001630| 74 50 61 72 61 6d 53 74 | 72 69 6e 67 20 28 20 74 |tParamSt|ring ( t|
|00001640| 68 65 41 70 70 6c 65 45 | 76 65 6e 74 2c 20 6b 4c |heAppleE|vent, kL|
|00001650| 53 54 41 52 72 65 67 45 | 78 70 2c 20 26 28 28 2a |STARregE|xp, &((*|
|00001660| 74 68 65 4c 53 74 61 72 | 48 64 6c 29 2d 3e 72 65 |theLStar|Hdl)->re|
|00001670| 67 45 78 70 29 2c 0d 09 | 09 28 63 68 61 72 20 2a |gExp),..|.(char *|
|00001680| 29 74 65 6d 70 42 75 66 | 66 65 72 2c 20 6b 4c 53 |)tempBuf|fer, kLS|
|00001690| 74 61 72 50 61 72 61 6d | 4d 61 78 53 69 7a 65 20 |tarParam|MaxSize |
|000016a0| 29 3b 0d 09 0d 09 2f 2a | 20 27 73 39 66 6e 27 20 |);..../*| 's9fn' |
|000016b0| 2d 20 6d 61 69 6c 46 69 | 6c 65 20 2a 2f 0d 09 74 |- mailFi|le */..t|
|000016c0| 68 65 45 72 72 20 3d 20 | 6c 73 74 61 72 41 45 47 |heErr = |lstarAEG|
|000016d0| 65 74 50 61 72 61 6d 53 | 70 6f 6f 6c 46 69 6c 65 |etParamS|poolFile|
|000016e0| 20 28 20 74 68 65 41 70 | 70 6c 65 45 76 65 6e 74 | ( theAp|pleEvent|
|000016f0| 2c 20 6b 4c 53 54 41 52 | 6d 61 69 6c 46 69 6c 65 |, kLSTAR|mailFile|
|00001700| 2c 20 26 28 28 2a 74 68 | 65 4c 53 74 61 72 48 64 |, &((*th|eLStarHd|
|00001710| 6c 29 2d 3e 6d 61 69 6c | 46 69 6c 65 29 2c 0d 09 |l)->mail|File),..|
|00001720| 09 28 63 68 61 72 20 2a | 29 74 65 6d 70 42 75 66 |.(char *|)tempBuf|
|00001730| 66 65 72 2c 20 6b 4c 53 | 74 61 72 50 61 72 61 6d |fer, kLS|tarParam|
|00001740| 4d 61 78 53 69 7a 65 20 | 29 3b 0d 09 0d 09 2f 2a |MaxSize |);..../*|
|00001750| 20 27 73 39 6d 63 27 20 | 2d 20 73 65 6e 64 65 72 | 's9mc' |- sender|
|00001760| 4d 43 20 2a 2f 0d 09 74 | 68 65 45 72 72 20 3d 20 |MC */..t|heErr = |
|00001770| 41 45 47 65 74 50 61 72 | 61 6d 53 74 72 69 6e 67 |AEGetPar|amString|
|00001780| 20 28 20 74 68 65 41 70 | 70 6c 65 45 76 65 6e 74 | ( theAp|pleEvent|
|00001790| 2c 20 6b 4c 53 54 41 52 | 73 65 6e 64 65 72 4d 43 |, kLSTAR|senderMC|
|000017a0| 2c 20 26 28 28 2a 74 68 | 65 4c 53 74 61 72 48 64 |, &((*th|eLStarHd|
|000017b0| 6c 29 2d 3e 73 65 6e 64 | 65 72 4d 43 29 2c 0d 09 |l)->send|erMC),..|
|000017c0| 09 28 63 68 61 72 20 2a | 29 74 65 6d 70 42 75 66 |.(char *|)tempBuf|
|000017d0| 66 65 72 2c 20 6b 4c 53 | 74 61 72 50 61 72 61 6d |fer, kLS|tarParam|
|000017e0| 4d 61 78 53 69 7a 65 20 | 29 3b 0d 09 0d 09 2f 2a |MaxSize |);..../*|
|000017f0| 20 27 73 39 6d 7a 27 20 | 2d 20 73 65 6e 64 65 72 | 's9mz' |- sender|
|00001800| 4d 43 5a 6f 6e 65 20 2a | 2f 0d 09 74 68 65 45 72 |MCZone *|/..theEr|
|00001810| 72 20 3d 20 41 45 47 65 | 74 50 61 72 61 6d 53 74 |r = AEGe|tParamSt|
|00001820| 72 69 6e 67 20 28 20 74 | 68 65 41 70 70 6c 65 45 |ring ( t|heAppleE|
|00001830| 76 65 6e 74 2c 20 6b 4c | 53 54 41 52 73 65 6e 64 |vent, kL|STARsend|
|00001840| 65 72 4d 43 5a 6f 6e 65 | 2c 20 26 28 28 2a 74 68 |erMCZone|, &((*th|
|00001850| 65 4c 53 74 61 72 48 64 | 6c 29 2d 3e 73 65 6e 64 |eLStarHd|l)->send|
|00001860| 65 72 4d 43 5a 6f 6e 65 | 29 2c 0d 09 09 28 63 68 |erMCZone|),...(ch|
|00001870| 61 72 20 2a 29 74 65 6d | 70 42 75 66 66 65 72 2c |ar *)tem|pBuffer,|
|00001880| 20 6b 4c 53 74 61 72 50 | 61 72 61 6d 4d 61 78 53 | kLStarP|aramMaxS|
|00001890| 69 7a 65 20 29 3b 0d 09 | 0d 09 2f 2a 20 27 73 39 |ize );..|../* 's9|
|000018a0| 6d 65 27 20 2d 20 73 65 | 6e 64 65 72 4d 43 45 6d |me' - se|nderMCEm|
|000018b0| 61 69 6c 20 2a 2f 0d 09 | 74 68 65 45 72 72 20 3d |ail */..|theErr =|
|000018c0| 20 41 45 47 65 74 50 61 | 72 61 6d 53 74 72 69 6e | AEGetPa|ramStrin|
|000018d0| 67 20 28 20 74 68 65 41 | 70 70 6c 65 45 76 65 6e |g ( theA|ppleEven|
|000018e0| 74 2c 20 6b 4c 53 54 41 | 52 73 65 6e 64 65 72 4d |t, kLSTA|RsenderM|
|000018f0| 43 45 6d 61 69 6c 2c 20 | 26 28 28 2a 74 68 65 4c |CEmail, |&((*theL|
|00001900| 53 74 61 72 48 64 6c 29 | 2d 3e 73 65 6e 64 65 72 |StarHdl)|->sender|
|00001910| 4d 43 45 6d 61 69 6c 29 | 2c 0d 09 09 28 63 68 61 |MCEmail)|,...(cha|
|00001920| 72 20 2a 29 74 65 6d 70 | 42 75 66 66 65 72 2c 20 |r *)temp|Buffer, |
|00001930| 6b 4c 53 74 61 72 50 61 | 72 61 6d 4d 61 78 53 69 |kLStarPa|ramMaxSi|
|00001940| 7a 65 20 29 3b 0d 09 0d | 09 2f 2a 20 64 6f 6e 27 |ze );...|./* don'|
|00001950| 74 20 6e 65 65 64 20 74 | 68 65 20 62 75 66 66 65 |t need t|he buffe|
|00001960| 72 20 61 6e 79 20 6d 6f | 72 65 20 2a 2f 0d 09 44 |r any mo|re */..D|
|00001970| 69 73 70 6f 73 65 50 74 | 72 20 28 20 74 65 6d 70 |isposePt|r ( temp|
|00001980| 42 75 66 66 65 72 20 29 | 3b 0d 09 0d 09 2f 2a 20 |Buffer )|;..../* |
|00001990| a5 a5 a5 20 6e 65 65 64 | 20 74 6f 20 61 64 64 20 |... need| to add |
|000019a0| 22 4d 79 41 45 47 6f 74 | 52 65 71 75 69 72 65 64 |"MyAEGot|Required|
|000019b0| 50 61 72 61 6d 73 22 20 | 68 65 72 65 20 2a 2f 0d |Params" |here */.|
|000019c0| 09 0d 09 2f 2a 20 64 6f | 6e 27 74 20 6b 6e 6f 77 |.../* do|n't know|
|000019d0| 20 68 6f 77 20 74 6f 20 | 64 65 74 65 72 6d 69 6e | how to |determin|
|000019e0| 65 20 64 69 66 66 65 72 | 65 6e 63 65 20 62 65 74 |e differ|ence bet|
|000019f0| 77 65 65 6e 20 61 63 74 | 69 6f 6e 20 61 6e 64 20 |ween act|ion and |
|00001a00| 74 72 69 67 67 65 72 20 | 79 65 74 2c 0d 09 09 73 |trigger |yet,...s|
|00001a10| 6f 20 64 65 66 61 75 6c | 74 20 74 6f 20 74 72 69 |o defaul|t to tri|
|00001a20| 67 67 65 72 2e 20 54 68 | 69 73 20 63 61 6e 20 62 |gger. Th|is can b|
|00001a30| 65 20 63 68 61 6e 67 65 | 64 20 74 6f 20 61 63 74 |e change|d to act|
|00001a40| 69 6f 6e 20 62 79 20 74 | 68 65 0d 09 09 27 4d 79 |ion by t|he...'My|
|00001a50| 4c 69 73 74 53 54 41 52 | 50 72 6f 63 65 73 73 27 |ListSTAR|Process'|
|00001a60| 20 66 75 6e 63 74 69 6f | 6e 20 2a 2f 0d 09 28 2a | functio|n */..(*|
|00001a70| 74 68 65 4c 53 74 61 72 | 48 64 6c 29 2d 3e 6d 65 |theLStar|Hdl)->me|
|00001a80| 74 68 6f 64 20 3d 20 4c | 69 73 74 53 54 41 52 5f |thod = L|istSTAR_|
|00001a90| 54 72 69 67 67 65 72 3b | 0d 09 0d 09 2f 2a 20 61 |Trigger;|..../* a|
|00001aa0| 6c 6c 6f 63 61 74 65 20 | 74 72 69 67 67 65 72 56 |llocate |triggerV|
|00001ab0| 61 6c 75 65 20 2a 2f 0d | 09 28 2a 74 68 65 4c 53 |alue */.|.(*theLS|
|00001ac0| 74 61 72 48 64 6c 29 2d | 3e 74 72 69 67 67 65 72 |tarHdl)-|>trigger|
|00001ad0| 56 61 6c 75 65 20 3d 20 | 28 6c 6f 6e 67 20 2a 29 |Value = |(long *)|
|00001ae0| 20 4d 79 4e 65 77 50 74 | 72 20 28 20 73 69 7a 65 | MyNewPt|r ( size|
|00001af0| 6f 66 28 6c 6f 6e 67 29 | 2c 20 6e 69 6c 20 29 3b |of(long)|, nil );|
|00001b00| 0d 09 0d 09 69 66 20 28 | 20 28 2a 74 68 65 4c 53 |....if (| (*theLS|
|00001b10| 74 61 72 48 64 6c 29 2d | 3e 74 72 69 67 67 65 72 |tarHdl)-|>trigger|
|00001b20| 56 61 6c 75 65 20 21 3d | 20 6e 69 6c 20 29 0d 09 |Value !=| nil )..|
|00001b30| 7b 0d 09 09 2f 2a 20 64 | 65 66 61 75 6c 74 20 74 |{.../* d|efault t|
|00001b40| 6f 20 66 61 69 6c 75 72 | 65 20 75 6e 6c 65 73 73 |o failur|e unless|
|00001b50| 20 74 68 65 20 27 4d 79 | 4c 69 73 74 53 54 41 52 | the 'My|ListSTAR|
|00001b60| 50 72 6f 63 65 73 73 27 | 20 66 75 6e 63 74 69 6f |Process'| functio|
|00001b70| 6e 20 64 65 74 65 72 6d | 69 6e 65 73 20 73 75 63 |n determ|ines suc|
|00001b80| 63 65 73 73 20 6f 72 20 | 65 72 72 6f 72 20 2a 2f |cess or |error */|
|00001b90| 0d 09 09 2a 28 28 2a 74 | 68 65 4c 53 74 61 72 48 |...*((*t|heLStarH|
|00001ba0| 64 6c 29 2d 3e 74 72 69 | 67 67 65 72 56 61 6c 75 |dl)->tri|ggerValu|
|00001bb0| 65 29 09 3d 20 54 72 69 | 67 67 65 72 5f 66 61 69 |e).= Tri|gger_fai|
|00001bc0| 6c 75 72 65 3b 0d 09 7d | 0d 09 0d 09 2f 2a 20 74 |lure;..}|..../* t|
|00001bd0| 68 69 73 20 69 73 20 77 | 68 65 72 65 20 74 68 65 |his is w|here the|
|00001be0| 20 61 70 70 6c 69 63 61 | 74 69 6f 6e 20 73 70 65 | applica|tion spe|
|00001bf0| 63 69 66 69 63 20 4c 69 | 73 74 53 54 41 52 20 65 |cific Li|stSTAR e|
|00001c00| 76 65 6e 74 20 68 61 6e | 64 6c 69 6e 67 20 63 6f |vent han|dling co|
|00001c10| 6d 65 73 20 69 6e 74 6f | 20 70 6c 61 79 0d 09 09 |mes into| play...|
|00001c20| 74 68 65 20 66 75 6e 63 | 74 69 6f 6e 20 22 4d 79 |the func|tion "My|
|00001c30| 4c 69 73 74 53 54 41 52 | 50 72 6f 63 65 73 73 22 |ListSTAR|Process"|
|00001c40| 20 6d 75 73 74 20 62 65 | 20 70 72 6f 76 69 64 65 | must be| provide|
|00001c50| 64 20 62 79 20 74 68 65 | 20 75 73 65 72 20 6f 66 |d by the| user of|
|00001c60| 0d 09 09 74 68 69 73 20 | 73 6f 75 72 63 65 20 63 |...this |source c|
|00001c70| 6f 64 65 20 2a 2f 0d 09 | 48 55 6e 6c 6f 63 6b 09 |ode */..|HUnlock.|
|00001c80| 09 09 09 28 20 28 48 61 | 6e 64 6c 65 29 74 68 65 |...( (Ha|ndle)the|
|00001c90| 4c 53 74 61 72 48 64 6c | 20 29 3b 0d 09 4d 79 4c |LStarHdl| );..MyL|
|00001ca0| 69 73 74 53 54 41 52 50 | 72 6f 63 65 73 73 09 28 |istSTARP|rocess.(|
|00001cb0| 20 74 68 65 4c 53 74 61 | 72 48 64 6c 20 29 3b 0d | theLSta|rHdl );.|
|00001cc0| 09 48 4c 6f 63 6b 09 09 | 09 09 28 20 28 48 61 6e |.HLock..|..( (Han|
|00001cd0| 64 6c 65 29 74 68 65 4c | 53 74 61 72 48 64 6c 20 |dle)theL|StarHdl |
|00001ce0| 29 3b 0d 09 0d 09 69 66 | 20 28 20 28 28 2a 74 68 |);....if| ( ((*th|
|00001cf0| 65 4c 53 74 61 72 48 64 | 6c 29 2d 3e 6d 65 74 68 |eLStarHd|l)->meth|
|00001d00| 6f 64 20 3d 3d 20 4c 69 | 73 74 53 54 41 52 5f 54 |od == Li|stSTAR_T|
|00001d10| 72 69 67 67 65 72 29 20 | 26 26 0d 09 09 28 28 2a |rigger) |&&...((*|
|00001d20| 74 68 65 4c 53 74 61 72 | 48 64 6c 29 2d 3e 74 72 |theLStar|Hdl)->tr|
|00001d30| 69 67 67 65 72 56 61 6c | 75 65 20 21 3d 20 6e 69 |iggerVal|ue != ni|
|00001d40| 6c 29 20 29 0d 09 7b 0d | 09 09 2f 2a 20 69 66 20 |l) )..{.|../* if |
|00001d50| 74 68 65 20 65 76 65 6e | 74 20 69 73 20 61 20 74 |the even|t is a t|
|00001d60| 72 69 67 67 65 72 2c 20 | 72 65 74 75 72 6e 20 74 |rigger, |return t|
|00001d70| 68 65 20 74 72 69 67 67 | 65 72 20 76 61 6c 75 65 |he trigg|er value|
|00001d80| 20 2a 2f 0d 09 09 74 68 | 65 45 72 72 20 3d 20 41 | */...th|eErr = A|
|00001d90| 45 50 75 74 50 61 72 61 | 6d 50 74 72 20 28 20 54 |EPutPara|mPtr ( T|
|00001da0| 68 65 52 65 70 6c 79 2c | 20 6b 65 79 44 69 72 65 |heReply,| keyDire|
|00001db0| 63 74 4f 62 6a 65 63 74 | 2c 20 74 79 70 65 4c 6f |ctObject|, typeLo|
|00001dc0| 6e 67 49 6e 74 65 67 65 | 72 2c 0d 09 09 09 28 50 |ngIntege|r,....(P|
|00001dd0| 74 72 29 28 28 2a 74 68 | 65 4c 53 74 61 72 48 64 |tr)((*th|eLStarHd|
|00001de0| 6c 29 2d 3e 74 72 69 67 | 67 65 72 56 61 6c 75 65 |l)->trig|gerValue|
|00001df0| 29 2c 20 73 69 7a 65 6f | 66 28 6c 6f 6e 67 29 20 |), sizeo|f(long) |
|00001e00| 29 3b 0d 09 7d 0d 09 65 | 6c 73 65 0d 09 7b 0d 09 |);..}..e|lse..{..|
|00001e10| 09 2f 2a 20 6f 74 68 65 | 72 77 69 73 65 2c 20 64 |./* othe|rwise, d|
|00001e20| 6f 6e 27 74 20 72 65 74 | 75 72 6e 20 61 6e 79 20 |on't ret|urn any |
|00001e30| 64 61 74 61 20 2a 2f 0d | 09 09 74 68 65 45 72 72 |data */.|..theErr|
|00001e40| 20 3d 20 6e 6f 45 72 72 | 3b 0d 09 7d 0d 09 0d 09 | = noErr|;..}....|
|00001e50| 48 55 6e 6c 6f 63 6b 20 | 28 20 28 48 61 6e 64 6c |HUnlock |( (Handl|
|00001e60| 65 29 74 68 65 4c 53 74 | 61 72 48 64 6c 20 29 3b |e)theLSt|arHdl );|
|00001e70| 0d 09 0d 09 2f 2a 20 64 | 65 61 6c 6c 6f 63 61 74 |..../* d|eallocat|
|00001e80| 65 20 6d 65 6d 6f 72 79 | 20 2a 2f 0d 09 6c 73 74 |e memory| */..lst|
|00001e90| 61 72 44 69 73 70 6f 73 | 65 48 61 6e 64 6c 65 20 |arDispos|eHandle |
|00001ea0| 28 20 74 68 65 4c 53 74 | 61 72 48 64 6c 20 29 3b |( theLSt|arHdl );|
|00001eb0| 0d 09 0d 09 72 65 74 75 | 72 6e 20 74 68 65 45 72 |....retu|rn theEr|
|00001ec0| 72 3b 0d 7d 20 2f 2a 20 | 4c 69 73 74 53 54 41 52 |r;.} /* |ListSTAR|
|00001ed0| 41 70 70 6c 65 45 76 65 | 6e 74 20 2a 2f 0d 0d 0d |AppleEve|nt */...|
|00001ee0| 23 70 72 61 67 6d 61 20 | 73 65 67 6d 65 6e 74 20 |#pragma |segment |
|00001ef0| 41 70 70 6c 65 45 76 65 | 6e 74 73 0d 2f 2a 20 70 |AppleEve|nts./* p|
|00001f00| 72 69 76 61 74 65 20 66 | 75 6e 63 74 69 6f 6e 20 |rivate f|unction |
|00001f10| 74 6f 20 67 65 74 20 61 | 6e 20 48 54 54 50 4d 65 |to get a|n HTTPMe|
|00001f20| 74 68 6f 64 20 66 72 6f | 6d 20 61 20 70 61 72 61 |thod fro|m a para|
|00001f30| 6d 65 74 65 72 20 2a 2f | 0d 73 74 61 74 69 63 20 |meter */|.static |
|00001f40| 4f 53 45 72 72 0d 6c 73 | 74 61 72 41 45 47 65 74 |OSErr.ls|tarAEGet|
|00001f50| 50 61 72 61 6d 53 70 6f | 6f 6c 46 69 6c 65 20 28 |ParamSpo|olFile (|
|00001f60| 20 41 70 70 6c 65 45 76 | 65 6e 74 20 2a 74 68 65 | AppleEv|ent *the|
|00001f70| 41 70 70 6c 65 45 76 65 | 6e 74 2c 20 41 45 4b 65 |AppleEve|nt, AEKe|
|00001f80| 79 77 6f 72 64 20 74 68 | 65 41 45 4b 65 79 77 6f |yword th|eAEKeywo|
|00001f90| 72 64 2c 20 46 53 53 70 | 65 63 20 2a 74 68 65 46 |rd, FSSp|ec *theF|
|00001fa0| 69 6c 65 2c 20 63 68 61 | 72 20 2a 74 65 6d 70 42 |ile, cha|r *tempB|
|00001fb0| 75 66 66 65 72 2c 20 6c | 6f 6e 67 20 62 75 66 66 |uffer, l|ong buff|
|00001fc0| 65 72 53 69 7a 65 20 29 | 0d 7b 0d 09 4f 53 45 72 |erSize )|.{..OSEr|
|00001fd0| 72 09 09 74 68 65 45 72 | 72 3b 0d 09 44 65 73 63 |r..theEr|r;..Desc|
|00001fe0| 54 79 70 65 09 61 63 74 | 75 61 6c 54 79 70 65 3b |Type.act|ualType;|
|00001ff0| 0d 09 53 69 7a 65 09 09 | 61 63 74 75 61 6c 53 69 |..Size..|actualSi|
|00002000| 7a 65 3b 0d 09 0d 09 6d | 79 5f 61 73 73 65 72 74 |ze;....m|y_assert|
|00002010| 20 28 20 74 68 65 46 69 | 6c 65 20 21 3d 20 6e 69 | ( theFi|le != ni|
|00002020| 6c 2c 20 22 5c 70 6c 73 | 74 61 72 41 45 47 65 74 |l, "\pls|tarAEGet|
|00002030| 50 61 72 61 6d 53 70 6f | 6f 6c 46 69 6c 65 3a 20 |ParamSpo|olFile: |
|00002040| 74 68 65 46 69 6c 65 20 | 70 74 72 20 69 73 20 6e |theFile |ptr is n|
|00002050| 69 6c 22 20 29 3b 0d 09 | 6d 79 5f 61 73 73 65 72 |il" );..|my_asser|
|00002060| 74 20 28 20 74 68 65 41 | 70 70 6c 65 45 76 65 6e |t ( theA|ppleEven|
|00002070| 74 20 21 3d 20 6e 69 6c | 2c 20 22 5c 70 6c 73 74 |t != nil|, "\plst|
|00002080| 61 72 41 45 47 65 74 50 | 61 72 61 6d 53 70 6f 6f |arAEGetP|aramSpoo|
|00002090| 6c 46 69 6c 65 3a 20 74 | 68 65 41 70 70 6c 65 45 |lFile: t|heAppleE|
|000020a0| 76 65 6e 74 20 70 74 72 | 20 69 73 20 6e 69 6c 22 |vent ptr| is nil"|
|000020b0| 20 29 3b 0d 09 6d 79 5f | 61 73 73 65 72 74 20 28 | );..my_|assert (|
|000020c0| 20 74 65 6d 70 42 75 66 | 66 65 72 20 21 3d 20 6e | tempBuf|fer != n|
|000020d0| 69 6c 2c 20 22 5c 70 6c | 73 74 61 72 41 45 47 65 |il, "\pl|starAEGe|
|000020e0| 74 50 61 72 61 6d 53 70 | 6f 6f 6c 46 69 6c 65 3a |tParamSp|oolFile:|
|000020f0| 20 74 65 6d 70 42 75 66 | 66 65 72 20 70 74 72 20 | tempBuf|fer ptr |
|00002100| 69 73 20 6e 69 6c 22 20 | 29 3b 0d 09 0d 09 2f 2a |is nil" |);..../*|
|00002110| 20 70 75 74 20 74 68 65 | 20 6d 65 73 73 61 67 65 | put the| message|
|00002120| 20 73 70 6f 6f 6c 20 66 | 69 6c 65 20 6e 61 6d 65 | spool f|ile name|
|00002130| 20 69 6e 74 6f 20 74 68 | 65 20 74 65 6d 70 42 75 | into th|e tempBu|
|00002140| 66 66 65 72 20 2a 2f 0d | 09 74 68 65 45 72 72 20 |ffer */.|.theErr |
|00002150| 3d 20 41 45 47 65 74 50 | 61 72 61 6d 50 74 72 0d |= AEGetP|aramPtr.|
|00002160| 09 09 28 20 74 68 65 41 | 70 70 6c 65 45 76 65 6e |..( theA|ppleEven|
|00002170| 74 2c 20 74 68 65 41 45 | 4b 65 79 77 6f 72 64 2c |t, theAE|Keyword,|
|00002180| 20 74 79 70 65 43 68 61 | 72 2c 20 26 61 63 74 75 | typeCha|r, &actu|
|00002190| 61 6c 54 79 70 65 2c 20 | 28 50 74 72 29 74 65 6d |alType, |(Ptr)tem|
|000021a0| 70 42 75 66 66 65 72 2c | 20 62 75 66 66 65 72 53 |pBuffer,| bufferS|
|000021b0| 69 7a 65 20 2d 20 31 2c | 20 26 61 63 74 75 61 6c |ize - 1,| &actual|
|000021c0| 53 69 7a 65 20 29 3b 0d | 09 0d 09 69 66 20 28 20 |Size );.|...if ( |
|000021d0| 74 68 65 45 72 72 20 3d | 3d 20 6e 6f 45 72 72 20 |theErr =|= noErr |
|000021e0| 29 0d 09 7b 0d 09 09 6d | 79 5f 61 73 73 65 72 74 |)..{...m|y_assert|
|000021f0| 20 28 20 61 63 74 75 61 | 6c 53 69 7a 65 20 3c 20 | ( actua|lSize < |
|00002200| 62 75 66 66 65 72 53 69 | 7a 65 2c 20 22 5c 70 6c |bufferSi|ze, "\pl|
|00002210| 73 74 61 72 41 45 47 65 | 74 50 61 72 61 6d 53 70 |starAEGe|tParamSp|
|00002220| 6f 6f 6c 46 69 6c 65 3a | 20 61 63 74 75 61 6c 20 |oolFile:| actual |
|00002230| 70 61 72 61 6d 20 73 69 | 7a 65 20 74 6f 6f 20 62 |param si|ze too b|
|00002240| 69 67 22 20 29 3b 0d 09 | 09 0d 09 09 2f 2a 20 74 |ig" );..|..../* t|
|00002250| 65 72 6d 69 6e 61 74 65 | 20 74 68 65 20 62 75 66 |erminate| the buf|
|00002260| 66 65 72 20 77 69 74 68 | 20 61 20 6e 75 6c 6c 20 |fer with| a null |
|00002270| 62 79 74 65 2c 20 6d 61 | 6b 69 6e 67 20 69 74 20 |byte, ma|king it |
|00002280| 61 20 43 20 66 6f 72 6d | 61 74 20 73 74 72 69 6e |a C form|at strin|
|00002290| 67 20 2a 2f 0d 09 09 74 | 65 6d 70 42 75 66 66 65 |g */...t|empBuffe|
|000022a0| 72 5b 61 63 74 75 61 6c | 53 69 7a 65 5d 20 3d 20 |r[actual|Size] = |
|000022b0| 6e 69 6c 3b 0d 09 09 0d | 09 09 2f 2a 20 63 6f 6e |nil;....|../* con|
|000022c0| 76 65 72 74 20 74 6f 20 | 70 61 73 63 61 6c 20 66 |vert to |pascal f|
|000022d0| 6f 72 6d 61 74 20 73 74 | 72 69 6e 67 20 2a 2f 0d |ormat st|ring */.|
|000022e0| 09 09 43 32 50 53 74 72 | 20 28 20 74 65 6d 70 42 |..C2PStr| ( tempB|
|000022f0| 75 66 66 65 72 20 29 3b | 0d 09 09 2f 2a 20 6d 61 |uffer );|.../* ma|
|00002300| 6b 65 20 61 6e 20 66 73 | 73 70 65 63 20 75 73 69 |ke an fs|spec usi|
|00002310| 6e 67 20 74 68 65 20 6d | 61 69 6c 20 73 70 6f 6f |ng the m|ail spoo|
|00002320| 6c 20 64 69 72 65 63 74 | 6f 72 79 20 61 6e 64 20 |l direct|ory and |
|00002330| 74 68 65 20 74 65 6d 70 | 42 75 66 66 65 72 20 61 |the temp|Buffer a|
|00002340| 73 20 66 69 6c 65 20 6e | 61 6d 65 20 2a 2f 0d 09 |s file n|ame */..|
|00002350| 09 74 68 65 45 72 72 20 | 3d 20 46 53 4d 61 6b 65 |.theErr |= FSMake|
|00002360| 46 53 53 70 65 63 20 28 | 20 67 4c 69 73 74 53 54 |FSSpec (| gListST|
|00002370| 41 52 53 70 6f 6f 6c 46 | 6f 6c 64 65 72 2e 76 52 |ARSpoolF|older.vR|
|00002380| 65 66 4e 75 6d 2c 0d 09 | 09 09 67 4c 69 73 74 53 |efNum,..|..gListS|
|00002390| 54 41 52 53 70 6f 6f 6c | 46 6f 6c 64 65 72 2e 70 |TARSpool|Folder.p|
|000023a0| 61 72 49 44 2c 20 28 53 | 74 72 69 6e 67 50 74 72 |arID, (S|tringPtr|
|000023b0| 29 74 65 6d 70 42 75 66 | 66 65 72 2c 20 74 68 65 |)tempBuf|fer, the|
|000023c0| 46 69 6c 65 20 29 3b 0d | 09 7d 0d 09 0d 09 72 65 |File );.|.}....re|
|000023d0| 74 75 72 6e 20 74 68 65 | 45 72 72 3b 0d 7d 20 2f |turn the|Err;.} /|
|000023e0| 2a 20 6c 73 74 61 72 41 | 45 47 65 74 50 61 72 61 |* lstarA|EGetPara|
|000023f0| 6d 48 54 54 50 4d 65 74 | 68 6f 64 20 2a 2f 0d 0d |mHTTPMet|hod */..|
|00002400| 0d 23 65 6e 64 69 66 09 | 2f 2a 20 6b 43 6f 6d 70 |.#endif.|/* kComp|
|00002410| 69 6c 65 57 69 74 68 4c | 69 73 74 53 54 41 52 43 |ileWithL|istSTARC|
|00002420| 6f 64 65 20 2a 2f 0d 0d | 2f 2a 2a 2a 20 20 45 4f |ode */..|/***  EO|
|00002430| 46 20 20 2a 2a 2a 2f 0d | 00 00 00 00 00 00 00 00 |F  ***/.|........|
|00002440| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002450| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002460| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002470| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002480| 00 00 01 00 00 00 01 54 | 00 00 00 54 00 00 00 46 |.......T|...T...F|
|00002490| 1f 01 30 3c 09 1f a8 16 | 3e 1f 55 8f 2f 3c 65 61 |..0<....|>.U./<ea|
|000024a0| 72 73 2f 3c 74 79 70 65 | 48 6d 04 42 70 00 2f 00 |rs/<type|Hm.Bp./.|
|000024b0| 0a 4c 69 73 74 53 54 41 | 52 2e 63 00 02 00 00 00 |.ListSTA|R.c.....|
|000024c0| 54 45 58 54 43 57 49 45 | 00 04 00 00 00 00 00 00 |TEXTCWIE|........|
|000024d0| 00 00 54 45 58 54 43 57 | 49 45 00 04 00 00 00 00 |..TEXTCW|IE......|
|000024e0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000024f0| 00 00 ac 0a 66 9e 00 00 | 00 00 00 00 01 9a 3e 1f |....f...|......>.|
|00002500| 55 8f 2f 3c 63 6f 72 65 | 2f 3c 63 6c 6f 73 48 6d |U./<core|/<closHm|
|00002510| 04 4a 2f 3c 63 6c 6f 73 | 70 00 1f 00 30 3c 09 1f |.J/<clos|p...0<..|
|00002520| a8 16 3e 1f 55 8f 2f 3c | 65 61 72 73 2f 3c 7a 6f |..>.U./<|ears/<zo|
|00002530| 6f 6d 48 6d 04 4a 2f 3c | 7a 6f 6f 6d 70 00 1f 00 |omHm.J/<|zoomp...|
|00002540| 30 3c 09 1f a8 16 3e 1f | 30 07 2e 2e ff fc 4e 5e |0<....>.|0.....N^|
|00002550| 4e 75 4e 56 ff fc 48 e7 | 03 00 4a ad fb c8 66 1c |NuNV..H.|..J...f.|
|00002560| 70 08 2f 00 4e ad 01 e2 | 2b 40 fb c8 58 4f 66 0c |p./.N...|+@..XOf.|
|00002570| 3e 38 02 20 66 02 7e 94 | 30 07 60 66 48 6e ff fc |>8. f.~.|0.`fHn..|
|00002580| 00 00 00 48 00 09 4d 6f | 6e 61 63 6f 00 00 00 00 |...H..Mo|naco....|
|00002590| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000025a0| 00 00 00 00 00 00 00 03 | 00 04 00 57 00 05 01 b4 |........|...W....|
|000025b0| 02 19 00 57 00 05 01 b4 | 02 19 ac f9 bf 5b 00 00 |...W....|.....[..|
|000025c0| 00 00 00 00 00 00 00 00 | 00 00 01 00 00 00 00 04 |........|........|
|000025d0| 00 01 00 01 00 00 01 00 | 00 00 01 54 00 00 00 54 |........|...T...T|
|000025e0| 00 00 00 46 00 ea ba c8 | 21 6c 00 00 00 1c 00 46 |...F....|!l.....F|
|000025f0| 00 01 4d 50 53 52 00 00 | 00 12 4d 57 42 42 00 00 |..MPSR..|..MWBB..|
|00002600| 00 1e 03 ed ff ff 00 00 | 00 00 00 00 00 00 03 f0 |........|........|
|00002610| ff ff 00 00 00 4c 00 00 | 00 00 00 00 00 00 00 00 |.....L..|........|
|00002620| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002630| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002640| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002650| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002660| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002670| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
+--------+-------------------------+-------------------------+--------+--------+